   INTEGER , DIMENSION (50) :: bhi
   REAL    , DIMENSION (20) :: bhr
